home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / LANG / BASIC / LIB / EVENTSHELL / SHELLDB / !ShellDBug / !Run < prev    next >
Text File  |  1995-10-15  |  974b  |  23 lines
  1. | !Run Obey file for ShellDBug Application
  2. Set ShellDBug$Dir <Obey$Dir>
  3. Set ShellDBug$BasicFile <Obey$Dir>.!ShellDBug
  4. IF "<EvntShell$Path>"="" THEN ERROR 0 Shell resources not found
  5. |Change the next line if you are using a different
  6. |filetype number
  7. |Set Alias$@RunType_200 Run <Obey$Dir>.!Run %%*0
  8. IconSprites <Obey$Dir>.!Sprites
  9. WimpSlot -min 400K -max 400K
  10. Set Dummy$Path <Run$Path>,<Obey$Dir>.Resources.
  11. Run Dummy:ResFind ShellDBug
  12. Unset Dummy$Path
  13. |Load any modules required now
  14. RMEnsure InterfaceManager 1.25 RMLoad <EvntShell$Path>Interface
  15. RMEnsure InterfaceManager 1.25 Error Couldn't load Interface module
  16. RMEnsure MenuUtils 0.11 RMLoad <EvntShell$Path>MenuUtils
  17. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  18. RMEnsure MessageTrans 0.06 RMLoad <EvntShell$Path>MsgTrans
  19. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  20. |And check that there is still enough memory!
  21. WimpSlot -min 400K -max 400K
  22. Run <ShellDBug$Dir>.!ShellDBug %*0
  23.